object BrPartsForm: TBrPartsForm Left = 631 Top = 414 HelpContext = 4 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Browse Parts' ClientHeight = 235 ClientWidth = 384 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 384 Height = 37 Align = alTop BevelOuter = bvNone BorderWidth = 3 TabOrder = 0 object ActivateBtn: TSpeedButton Left = 285 Top = 4 Width = 80 Height = 25 AllowAllUp = True GroupIndex = 1 Caption = 'Backorders' OnClick = ActivateQuery end object Bevel1: TBevel Left = 3 Top = 32 Width = 378 Height = 2 Align = alBottom Shape = bsTopLine end object DBNavigator1: TDBNavigator Left = 8 Top = 4 Width = 135 Height = 25 DataSource = MastData.PartsSource VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh] TabOrder = 0 end object EditBtn: TButton Left = 175 Top = 4 Width = 75 Height = 25 Caption = '&Edit' ModalResult = 1 TabOrder = 1 OnClick = EditBtnClick end end object Panel2: TPanel Left = 0 Top = 196 Width = 384 Height = 39 Align = alBottom BevelOuter = bvNone TabOrder = 1 object CloseBtn: TButton Left = 292 Top = 9 Width = 74 Height = 25 Cancel = True Caption = '&Close' Default = True ModalResult = 2 TabOrder = 0 OnClick = CloseBtnClick end end object PartsGrid: TDBGrid Left = 0 Top = 37 Width = 384 Height = 159 Align = alClient Columns = < item FieldName = 'PartNo' end item FieldName = 'Description' end item FieldName = 'OnHand' end item FieldName = 'OnOrder' end item FieldName = 'BackOrd' end> DataSource = MastData.PartsSource Options = [dgTitles, dgColLines, dgRowLines, dgRowSelect] TabOrder = 2 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] OnDblClick = EditBtnClick end end